const
  CryptTableFull: array [TCryptTableFullInterval] of TPair = (
    #$D2#$E8,#$14#$36,#$60#$C6,#$4A#$46,#$21#$A4,#$5B#$15,#$70#$40,#$1B#$ED,
    #$FC#$53,#$80#$4F,#$E2#$EA,#$D4#$2F,#$92#$C2,#$58#$7F,#$D1#$E0,#$93#$6F,
    #$5C#$6A,#$EB#$B0,#$33#$BB,#$32#$96,#$50#$20,#$0B#$91,#$DB#$6E,#$99#$EE,
    #$27#$9B,#$98#$5E,#$79#$54,#$3F#$CC,#$A5#$B9,#$1D#$C8,#$B5#$CF,#$C1#$11,
    #$E7#$9E,#$63#$94,#$65#$E9,#$7B#$71,#$00#$B4,#$0D#$09,#$AC#$76,#$16#$75,
    #$48#$3C,#$4B#$2C,#$51#$84,#$7E#$89,#$12#$1F,#$B6#$DD,#$0E#$F5,#$59#$9D,
    #$2E#$F7,#$DC#$A8,#$05#$A7,#$52#$B1,#$AA#$8B,#$9C#$83,#$28#$B3,#$90#$3E,
    #$7D#$A0,#$8F#$57,#$CE#$0C,#$19#$62,#$86#$D3,#$95#$44,#$2A#$AD,#$7A#$B2,
    #$26#$22,#$5A#$D6,#$37#$66,#$45#$08,#$81#$AE,#$02#$B8,#$23#$FD,#$F1#$8C,
    #$17#$43,#$FB#$BE,#$41#$CD,#$2D#$67,#$47#$6B,#$77#$68,#$E4#$DE,#$3A#$7C,
    #$0F#$34,#$97#$31,#$13#$BD,#$61#$56,#$8A#$D7,#$E3#$E1,#$F2#$DF,#$E6#$F4,
    #$C0#$3B,#$C7#$24,#$18#$6D,#$10#$82,#$88#$73,#$25#$1A,#$87#$03,#$A9#$B7,
    #$74#$A6,#$BF#$39,#$D9#$04,#$EF#$1E,#$72#$C3,#$C5#$35,#$55#$5F,#$07#$A3,
    #$4C#$EC,#$D5#$FF,#$CA#$F0,#$BC#$8E,#$06#$38,#$AF#$30,#$D8#$64,#$5D#$49,
    #$FA#$F8,#$C4#$78,#$9A#$3D,#$AB#$0A,#$E5#$CB,#$69#$8D,#$C9#$01,#$1C#$F9,
    #$F3#$A2,#$9F#$A1,#$85#$2B,#$42#$6C,#$D0#$F6,#$FE#$DA,#$29#$4E,#$4D#$BA
  );
	
  CryptTableNoControl: array [TCryptTableNoControlInterval] of TPair = (
    #$96#$FD,#$3A#$C1,#$E5#$3D,#$B0#$8A,#$D7#$83,#$36#$29,#$B4#$CD,#$5B#$B8,
    #$71#$D1,#$F3#$E9,#$88#$D2,#$64#$94,#$A4#$20,#$F7#$6D,#$DE#$BB,#$C3#$EE,
    #$2E#$4F,#$DA#$5E,#$AD#$58,#$AC#$C2,#$8D#$47,#$5C#$D3,#$50#$4D,#$D8#$40,
    #$9D#$AF,#$CB#$FE,#$32#$C8,#$4A#$66,#$25#$98,#$7B#$F4,#$52#$F0,#$8C#$61,
    #$93#$EA,#$C4#$46,#$E2#$A8,#$E3#$6B,#$2A#$B2,#$BD#$5A,#$F2#$AE,#$A1#$87,
    #$B7#$69,#$B9#$D9,#$F6#$7E,#$ED#$84,#$5F#$59,#$82#$DF,#$91#$9C,#$CC#$E6,
    #$6E#$33,#$7D#$65,#$97#$53,#$D6#$B1,#$C9#$89,#$D0#$37,#$B3#$74,#$67#$34,
    #$E4#$63,#$B6#$4E,#$A7#$C0,#$51#$CA,#$43#$27,#$A5#$7C,#$23#$95,#$5D#$39,
    #$F1#$62,#$E1#$22,#$76#$75,#$2B#$4C,#$81#$57,#$B5#$F8,#$8E#$78,#$48#$EB,
    #$35#$AA,#$2D#$8B,#$8F#$C5,#$24#$F5,#$FB#$9F,#$45#$F9,#$FF#$77,#$54#$FC,
    #$70#$86,#$31#$CE,#$BA#$7A,#$28#$9E,#$41#$80,#$44#$26,#$9A#$6C,#$FA#$6F,
    #$6A#$BF,#$56#$EC,#$55#$AB,#$E7#$C7,#$30#$A9,#$3E#$72,#$E0#$7F,#$85#$21,
    #$DB#$2F,#$A0#$A3,#$79#$38,#$73#$68,#$A2#$A6,#$3B#$BE,#$3C#$BC,#$DD#$C6,
    #$60#$90,#$42#$CF,#$D4#$2C,#$E8#$49,#$9B#$EF,#$4B#$99,#$92#$D5,#$DC#$3F
  );

  CryptTableSafe: array [TCryptTableSafeInterval] of TPair = (
    #$54#$2D,#$7E#$23,#$63#$62,#$4B#$4C,#$7C#$66,#$68#$6E,#$2A#$3C,#$37#$3F,
    #$55#$28,#$5D#$26,#$49#$2B,#$74#$56,#$6A#$51,#$47#$57,#$6B#$4F,#$35#$71,
    #$41#$64,#$78#$7D,#$50#$30,#$43#$27,#$48#$25,#$39#$46,#$24#$6C,#$79#$3D,
    #$5E#$65,#$76#$5C,#$73#$2E,#$60#$6D,#$34#$3A,#$75#$33,#$31#$72,#$4D#$45,
    #$58#$5B,#$77#$40,#$52#$20,#$69#$7A,#$3B#$38,#$61#$67,#$3E#$36,#$53#$44,
    #$7B#$59,#$4E#$22,#$5F#$42,#$2F#$4A,#$7F#$21,#$5A#$2C,#$70#$29,#$6F#$32
  );
